Profile of (eval 344)[Sub/Quote.pm:3]

Filename	(eval 344)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 187843 statements in 203ms
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
46955	4	4	166ms	166ms	JSON::Schema::Modern::_assert__resource_index
1	1	1	11µs	32µs	JSON::Schema::Modern::::BEGIN@7.201 JSON::Schema::Modern::BEGIN@7.201
1	1	1	4µs	4µs	Method::Generate::Accessor::_Generated::BEGIN@12.202
1	1	1	4µs	11µs	Method::Generate::Accessor::_Generated::BEGIN@24.203

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
3	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4	1	1µs			my $default_for__5fresource_5findex = ${$_[1]->{"\$default_for__5fresource_5findex"}};
5	1	0s			my $isa_check_for__5fresource_5findex = ${$_[1]->{"\$isa_check_for__5fresource_5findex"}};
6					package JSON::Schema::Modern;
7	2	44µs	2	53µs	# spent 32µs (11+21) within JSON::Schema::Modern::BEGIN@7.201 which was called: # once (11µs+21µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 32µs making 1 call to JSON::Schema::Modern::BEGIN@7.201 # spent 21µs making 1 call to warnings::unimport
8					# spent 166ms (166+3µs) within JSON::Schema::Modern::_assert__resource_index which was called 46955 times, avg 4µs/call: # 46913 times (166ms+0s) by JSON::Schema::Modern::_get_resource at line 17 of (eval 338)[Sub/Quote.pm:3], avg 4µs/call # 18 times (20µs+0s) by JSON::Schema::Modern::_add_resources at line 17 of (eval 342)[Sub/Quote.pm:3], avg 1µs/call # 16 times (61µs+3µs) by JSON::Schema::Modern::_canonical_resources at line 17 of (eval 341)[Sub/Quote.pm:3], avg 4µs/call # 8 times (29µs+0s) by JSON::Schema::Modern::_add_resources_unsafe at line 17 of (eval 337)[Sub/Quote.pm:3], avg 4µs/call sub _assert__resource_index {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package Method::Generate::Accessor::_Generated;
12					# spent 4µs within Method::Generate::Accessor::_Generated::BEGIN@12.202 which was called: # once (4µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	1µs			$^H = 2018;
14	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	3µs			%^H = (
16					);
17	1	31µs	1	4µs	} # spent 4µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@12.202
18					# END quote_sub PRELUDE
19	46955	103ms			do {
20					my $val = exists $_[0]->{"_resource_index"} ?
21					$_[0]->{"_resource_index"}
22	46955	47.2ms			: do {
23	1	3µs	1	3µs	my $value = $default_for__5fresource_5findex->($_[0]); # spent 3µs making 1 call to JSON::Schema::Modern::__ANON__[JSON/Schema/Modern.pm:636]
24	9	319µs	2	18µs	# spent 11µs (4+7) within Method::Generate::Accessor::_Generated::BEGIN@24.203 which was called: # once (4µs+7µs) by Sub::Quote::_clean_eval at line 24 do { no warnings "void"; package Type::Tiny; (do { package Type::Tiny; (Ref::Util::XS::is_plain_hashref($value)) and do { my $ok = 1; for my $i (values %{$value}) { ($ok = 0, last) unless do { package Type::Tiny; (Ref::Util::XS::is_plain_hashref($i)) and (not grep {my $v = ($i)->{$_};not((/\A(?:canonical_uri\|path\|specification_version\|document\|vocabularies\|configs)\z/) or (((!!1)) and ((!defined($v)))))} keys %{$i}) and exists($i->{"canonical_uri"}) and do { package Type::Tiny; Scalar::Util::blessed($i->{"canonical_uri"}) and $i->{"canonical_uri"}->isa(q[Mojo::URL]) } and exists($i->{"path"}) and do { package Type::Tiny; defined($i->{"path"}) and do { ref(\$i->{"path"}) eq 'SCALAR' or ref(\(my $val = $i->{"path"})) eq 'SCALAR' } } and exists($i->{"specification_version"}) and (defined($i->{"specification_version"}) and !ref($i->{"specification_version"}) and $i->{"specification_version"} =~ m{\A(?:draft(?:20(?:19\-09\|20\-12)\|7))\z}) and exists($i->{"document"}) and do { package Type::Tiny; Scalar::Util::blessed($i->{"document"}) and $i->{"document"}->isa(q[JSON::Schema::Modern::Document]) } and exists($i->{"vocabularies"}) and (do { package Type::Tiny; Ref::Util::XS::is_plain_arrayref($i->{"vocabularies"}) } and do { my $ok = 1; for my $i (@{$i->{"vocabularies"}}) { ($ok = 0, last) unless ((do { package Type::Tiny; Types::Standard::_is_class_loaded(do { my $tmp = $i }) }) && (do { local $_ = $i; $_->DOES('JSON::Schema::Modern::Vocabulary') })) }; $ok }) and exists($i->{"configs"}) and do { package Type::Tiny; Ref::Util::XS::is_plain_hashref($i->{"configs"}) } } }; $ok } }) or Type::Tiny::_failed_check($isa_check_for__5fresource_5findex, "HashRef[Dict[canonical_uri=>InstanceOf[\"Mojo::URL\"],configs=>HashRef,document=>InstanceOf[\"JSON::Schema::Modern::Document\"],path=>Str,specification_version=>Enum[\"draft7\",\"draft2019-09\",\"draft2020-12\"],vocabularies=>ArrayRef[__ANON__],Slurpy[HashRef[Undef]]]]", $value, "attribute_name","_resource_index","attribute_step","isa check","mgaca","0","varname","\$self->{\"_resource_index\"}"); $value }; # spent 11µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@24.203 # spent 7µs making 1 call to warnings::unimport
25	1	1µs			$_[0]->{"_resource_index"} = $value
26					}
27					;
28	46955	41.4ms			exists $_[0]->{"_resource_index"}
29					or Carp::croak(q{Attempted to access '}."_resource_index".q{' but it is not set});
30	46955	11.4ms			$val;
31					}
32					}
33	1	1µs			$$_UNQUOTED = \&_assert__resource_index;
34					}
35	1	5µs			1;
36
37					;